Introducción

Herramientas de desarrollo

Paquetes de R

library(sf)
library(dplyr)
library(leaflet)
library(ggplot2)
library(plotly)
library(DT)
library(sf)
library(dplyr)
library(leaflet)
library(ggplot2)
library(plotly)
library(DT)
provincias <- # objeto sf de datos vectoriales con geometrías de multipolígonos
  st_read(
    "C:/Users/gf0604-1/datos geoespaciales/clase 08-06-22/provincias.geojson", # archivo de datos de entrada
    quiet = TRUE
  ) %>%
  st_transform(4326) # transformación al sistema de coordenadas WGS84
library(sf)
library(dplyr)
library(leaflet)
library(ggplot2)
library(plotly)
library(DT)
felinos <-
  st_read(
    "C:/Users/gf0604-1/datos geoespaciales/clase 08-06-22/felinos.csv",
    options = c(
      "X_POSSIBLE_NAMES=decimalLongitude", # columna de longitud decimal
      "Y_POSSIBLE_NAMES=decimalLatitude"   # columna de latitud decimal
    ),
    quiet = TRUE
  ) 

 st_crs(felinos)<-4326

Tabla

Gráfico

Mapa

leaflet() %>%
  addTiles() %>% # capa de base OSM
  # addPolygons(
  #   data = provincias,
  #   color = "black",
  #   fillColor = "transparent",
  #   stroke = TRUE,
  #   weight = 1.0,
  # ) %>%
  addCircleMarkers( # capa de registros de presencia (puntos)
    data = felinos, 
    stroke = F,
    radius = 4, 
    fillColor = "blue",
    fillOpacity = 1
    )